home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / pmr40.exe / POPUPS.INI < prev    next >
Encoding:
INI File  |  1997-03-17  |  77.1 KB  |  1,029 lines
  1. [mPopup]
  2. n0=-
  3. n1=Pr≥tΘótφ≥╤ v4.0:.echo 6 -s You are using -= The 12Pr≥tΘótφ≥╤ MASTER Script v4.0 =- http://www.iinet.net.au/~ventura/protect.html
  4. n2=-
  5. n3=ChannelFloodProtectionSettings
  6. n4=.-
  7. n5=.==> View Current Settings (Also F5) <==:f5
  8. n6=.-
  9. n7=.ChannelTextFlood
  10. n8=..Disable:set %textflood 0 | echo 4 %ver Channel text flood protection is now disabled
  11. n9=..Enable:set %textflood 1 | echo 4 %ver Channel text flood protection is now enabled and is currently set to activate on %textfloodl lines in %textfloods seconds
  12. n10=..EditSetting:{
  13. n11=  set %temp $$?="How many lines of text (default 5)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  14. n12=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  15. n13=  set %textfloodl %temp | set %textfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel text flood protection now activates on %textfloodl lines in %textfloods seconds when enabled
  16. n14=}
  17. n15=.ChannelJoin-PartFlood
  18. n16=..Disable:set %joinpartflood 0 | echo 4 %ver Channel join-part flood protection is now disabled
  19. n17=..Enable:set %joinpartflood 1 | echo 4 %ver Channel join-part flood protection is now enabled and is currently set to activate on %joinpartfloodl joins and parts in %joinpartfloods seconds
  20. n18=..EditSetting:{
  21. n19=  set %temp $$?="How many joins and parts (default 3)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  22. n20=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  23. n21=  set %joinpartfloodl %temp | set %joinpartfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel join-part flood protection now activates on %joinpartfloodl joins and parts in %joinpartfloods seconds when enabled
  24. n22=}
  25. n23=.ChannelNick-ChangeFlood
  26. n24=..Disable:set %nickflood 0 | echo 4 %ver Channel nick-change flood protection is now disabled
  27. n25=..Enable:set %nickflood 1 | echo 4 %ver Channel nick-change flood protection is now enabled and is currently set to activate on %nickfloodl nick changes in %nickfloods seconds
  28. n26=..EditSetting:{
  29. n27=  set %temp $$?="How many nick changes (default 3)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  30. n28=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  31. n29=  set %nickfloodl %temp | set %nickfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel nick-change flood protection now activates on %nickfloodl nick changes in %nickfloods seconds when enabled
  32. n30=}
  33. n31=.ChannelRepeatingFlood
  34. n32=..Disable:set %repflood 0 | echo 4 %ver Channel repeating flood protection is now disabled
  35. n33=..Enable:set %repflood 1 | echo 4 %ver Channel repeating flood protection is now enabled and is currently set to activate on %repfloodl repeats in %repfloods seconds
  36. n34=..EditSetting:{
  37. n35=  set %temp $$?="How many repeats (default 3)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  38. n36=  set %temp2 $$?="In how many seconds (default 10)" | if (%temp2 < 2) || (%temp2 > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  39. n37=  set %repfloodl %temp | set %repfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel repeating flood protection now activates on %repfloodl repeats in %repfloods seconds when enabled
  40. n38=}
  41. n39=.ChannelLengthFlood
  42. n40=..Disable:set %lengthflood 0 | echo 4 %ver Channel length flood protection is now disabled
  43. n41=..Enable:set %lengthflood 1 | echo 4 %ver Channel length flood protection is now enabled and is currently set to activate on text containing over %lengthfloodl characters
  44. n42=..EditSetting:{
  45. n43=  set %temp $$?="Enter the length limit (default 350)" | if (%temp < 100) || (%temp > 600) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  46. n44=  set %lengthfloodl %temp | unset %temp | echo 4 %ver Channel length flood protection now activates on text over %lengthfloodl characters when enabled
  47. n45=}
  48. n46=.ChannelColourFlood
  49. n47=..Disable:set %colourflood 0 | echo 4 %ver Channel colour flood protection is now disabled
  50. n48=..Enable:set %colourflood 1 | echo 4 %ver Channel colour flood protection is now enabled and is currently set to activate on text containing over %colourfloodl colour changes
  51. n49=..EditSetting:{
  52. n50=  set %temp $$?="Enter the colour change limit (default 30)" | if (%temp < 5) || (%temp > 200) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  53. n51=  set %colourfloodl %temp | unset %temp | echo 4 %ver Channel colour flood protection now activates on text containing over %colourfloodl colour changes when enabled
  54. n52=}
  55. n53=.ChannelCAPSFlood
  56. n54=..Disable:set %capsflood 0 | echo 4 %ver Channel CAPS flood protection is now disabled
  57. n55=..Enable:set %capsflood 1 | echo 4 %ver Channel CAPS flood protection is now enabled and is currently set to activate on text over %capsfloodl characters
  58. n56=..EditSetting:{
  59. n57=  set %temp $$?="Enter the CAPS length limit (default 50)" | if (%temp < 10) || (%temp > 600) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  60. n58=  set %capsfloodl %temp | unset %temp | echo 4 %ver Channel caps flood protection now activates on text over %capsfloodl characters when enabled
  61. n59=}
  62. n60=.ChannelSoundFlood
  63. n61=..Disable:set %soundflood 0 | echo 4 %ver Channel sound flood protection is now disabled
  64. n62=..Enable:set %soundflood 1 | echo 4 %ver Channel sound flood protection is now enabled and is currently set to activate on %soundfloodl sound requests in %soundfloods seconds
  65. n63=..EditSetting:{
  66. n64=  set %temp $$?="How many sound request (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  67. n65=  set %temp2 $$?="In how many seconds (default 10)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  68. n66=  set %soundfloodl %temp | set %soundfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel sound flood protection now activates on %soundfloodl sound requests in %soundfloods seconds when enabled
  69. n67=}
  70. n68=.-
  71. n69=ChannelMassModeProtectionSettings
  72. n70=.-
  73. n71=.==> View Current Settings (Also F6) <==:f6
  74. n72=.-
  75. n73=.MassDeopProtection
  76. n74=..Disable:set %massdeop 0 | echo 4 %ver Mass deop protection is now disabled
  77. n75=..Enable:set %massdeop 1 | echo 4 %ver Mass deop protection is now enabled and is currently set to activate on %massdeopl deops in %massdeops seconds
  78. n76=..EditSetting:{
  79. n77=  set %temp $$?="How many deops (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  80. n78=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  81. n79=  set %massdeopl %temp | set %massdeops %temp2 | unset %temp %temp2 | echo 4 %ver Mass deop protection now activates on %massdeopl deops in %massdeops seconds when enabled
  82. n80=}
  83. n81=.MassOpProtection
  84. n82=..Disable:set %massop 0 | echo 4 %ver Mass op protection is now disabled
  85. n83=..Enable:set %massop 1 | echo 4 %ver Mass op protection is now enabled and is currently set to activate on %massopl ops in %massops seconds
  86. n84=..EditSetting:{
  87. n85=  set %temp $$?="How many ops (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  88. n86=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  89. n87=  set %massopl %temp | set %massops %temp2 | unset %temp %temp2 | echo 4 %ver Mass op protection now activates on %massopl ops in %massops seconds when enabled
  90. n88=}
  91. n89=.MassKickProtection
  92. n90=..Disable:set %masskick 0 | echo 4 %ver Mass kick protection is now disabled
  93. n91=..Enable:set %masskick 1 | echo 4 %ver Mass kick protection is now enabled and is currently set to activate on %masskickl kicks in %masskicks seconds
  94. n92=..EditSetting:{
  95. n93=  set %temp $$?="How many kicks (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  96. n94=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  97. n95=  set %masskickl %temp | set %masskicks %temp2 | unset %temp %temp2 | echo 4 %ver Mass kick protection now activates on %masskickl kicks in %masskicks seconds when enabled
  98. n96=}
  99. n97=.MassBanProtection
  100. n98=..Disable:set %massban 0 | echo 4 %ver Mass ban protection is now disabled
  101. n99=..Enable:set %massban 1 | echo 4 %ver Mass ban protection is now enabled and is currently set to activate on %massbanl bans in %massbans seconds
  102. n100=..EditSetting:{
  103. n101=  set %temp $$?="How many bans (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  104. n102=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  105. n103=  set %massbanl %temp | set %massbans %temp2 | unset %temp %temp2 | echo 4 %ver Mass ban protection now activates on %massbanl bans in %massbans seconds when enabled
  106. n104=}
  107. n105=.MassDevoiceProtection
  108. n106=..Disable:set %massdevoice 0 | echo 4 %ver Mass devoice protection is now disabled
  109. n107=..Enable:set %massdevoice 1 | echo 4 %ver Mass devoice protection is now enabled and is currently set to activate on %massdevoicel devoices in %massdevoices seconds
  110. n108=..EditSetting:{
  111. n109=  set %temp $$?="How many devoices (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  112. n110=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  113. n111=  set %massdevoicel %temp | set %massdevoices %temp2 | unset %temp %temp2 | echo 4 %ver Mass devoice protection now activates on %massdevoicel devoices in %massdevoices seconds when enabled
  114. n112=}
  115. n113=.-
  116. n114=PrivateFloodProtectionSettings
  117. n115=.-
  118. n116=.==> View Current Settings (Also F7) <==:f7
  119. n117=.-
  120. n118=.PrivateMSGFlood
  121. n119=..Disable:set %privatemsgflood 0 | echo 4 %ver Private MSG flood protection is now disabled
  122. n120=..Enable:set %privatemsgflood 1 | echo 4 %ver Private MSG flood protection is now enabled and is currently set to activate on %privatemsgfloodl msgs in %privatemsgfloods seconds
  123. n121=..EditSetting:{
  124. n122=  set %temp $$?="How many msg's (default 5)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  125. n123=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  126. n124=  set %privatemsgfloodl %temp | set %privatemsgfloods %temp2 | unset %temp %temp2 | echo 4 %ver Private MSG flood protection now activates on %privatemsgfloodl msgs in %privatemsgfloods seconds when enabled
  127. n125=}
  128. n126=.PrivateNoticeFlood
  129. n127=..Disable:set %privatenoticeflood 0 | echo 4 %ver Private Notice flood protection is now disabled
  130. n128=..Enable:set %privatenoticeflood 1 | echo 4 %ver Private Notice flood protection is now enabled and is currently set to activate on %privatenoticefloodl notices in %privatenoticefloods seconds
  131. n129=..EditSetting:{
  132. n130=  set %temp $$?="How many notices (default 5)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  133. n131=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  134. n132=  set %privatenoticefloodl %temp | set %privatenoticefloods %temp2 | unset %temp %temp2 | echo 4 %ver Private Notice flood protection now activates on %privatenoticefloodl msgs in %privatenoticefloods seconds when enabled
  135. n133=}
  136. n134=.PrivateRepeatingFlood
  137. n135=..Disable:set %repfloodp 0 | echo 4 %ver Private repeating flood protection is now disabled
  138. n136=..Enable:set %repfloodp 1 | echo 4 %ver Private repeating flood protection is now enabled and is currently set to activate on %repfloodpl repeats in %repfloodps seconds
  139. n137=..EditSetting:{
  140. n138=  set %temp $$?="How many repeats (default 3)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  141. n139=  set %temp2 $$?="In how many seconds (default 10)" | if (%temp2 < 2) || (%temp2 > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  142. n140=  set %repfloodpl %temp | set %repfloodps %temp2 | unset %temp %temp2 | echo 4 %ver Private repeating flood protection now activates on %repfloodpl repeats in %repfloodps seconds when enabled
  143. n141=}
  144. n142=.PrivateLengthFlood
  145. n143=..Disable:set %lengthfloodp 0 | echo 4 %ver Private length flood protection is now disabled
  146. n144=..Enable:set %lengthfloodp 1 | echo 4 %ver Private length flood protection is now enabled and is currently set to activate on text containing over %lengthfloodpl characters
  147. n145=..EditSetting:{
  148. n146=  set %temp $$?="Enter the length limit (default 350)" | if (%temp < 100) || (%temp > 600) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  149. n147=  set %lengthfloodpl %temp | unset %temp | echo 4 %ver Private length flood protection now activates on text over %lengthfloodpl characters when enabled
  150. n148=}
  151. n149=.PrivateColourFlood
  152. n150=..Disable:set %colourfloodp 0 | echo 4 %ver Private colour flood protection is now disabled
  153. n151=..Enable:set %colourfloodp 1 | echo 4 %ver Private colour flood protection is now enabled and is currently set to activate on text containing over %colourfloodpl colour changes
  154. n152=..EditSetting:{
  155. n153=  set %temp $$?="Enter the colour change limit (default 30)" | if (%temp < 5) || (%temp > 200) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  156. n154=  set %colourfloodpl %temp | unset %temp | echo 4 %ver Private colour flood protection now activates on text containing over %colourfloodpl colour changes when enabled
  157. n155=}
  158. n156=.PrivateCAPSFlood
  159. n157=..Disable:set %capsfloodp 0 | echo 4 %ver Private CAPS flood protection is now disabled
  160. n158=..Enable:set %capsfloodp 1 | echo 4 %ver Private CAPS flood protection is now enabled and is currently set to activate on text over %capsfloodpl characters
  161. n159=..EditSetting:{
  162. n160=  set %temp $$?="Enter the CAPS length limit (default 50)" | if (%temp < 10) || (%temp > 600) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  163. n161=  set %capsfloodpl %temp | unset %temp | echo 4 %ver Private caps flood protection now activates on text over %capsfloodpl characters when enabled
  164. n162=}
  165. n163=.DCCTextFlood
  166. n164=..Disable:set %dcctextflood 0 | echo 4 %ver DCC Text flood protection is now disabled
  167. n165=..Enable:set %dcctextflood 1 | echo 4 %ver DCC Text flood protection is now enabled and is currently set to activate on %dcctextfloodl dcc texts in %dcctextfloods seconds
  168. n166=..EditSetting:{
  169. n167=  set %temp $$?="How many lines of text (default 5)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  170. n168=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  171. n169=  set %dcctextfloodl %temp | set %dcctextfloods %temp2 | unset %temp %temp2 | echo 4 %ver DCC text flood protection now activates on %dcctextfloodl msgs in %dcctextfloods seconds when enabled
  172. n170=}
  173. n171=.-
  174. n172=PrivateCTCPProtectionSettings
  175. n173=.-
  176. n174=.==> View Current Settings (Also F8) <==:f8
  177. n175=.-
  178. n176=.PrivateCTCPFlood
  179. n177=..Disable:set %ctcpflood 0 | echo 4 %ver Private CTCP flood protection is now disabled
  180. n178=..Enable:set %ctcpflood 1 | echo 4 %ver Private CTCP flood protection is now enabled and is currently set to activate on %ctcpfloodl ctcps in %ctcpfloods seconds
  181. n179=..EditSetting:{
  182. n180=  set %temp $$?="How many ctcp's (default 2)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  183. n181=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  184. n182=  set %ctcpfloodl %temp | set %ctcpfloods %temp2 | unset %temp %temp2 | echo 4 %ver Private CTCP flood protection now activates on %ctcpfloodl ctcps in %ctcpfloods seconds when enabled
  185. n183=}
  186. n184=.PrivateDCCSend/ChatFlood
  187. n185=..Disable:set %dccflood 0 | echo 4 %ver Private DCC Send/Chat flood protection is now disabled
  188. n186=..Enable:set %dccflood 1 | echo 4 %ver Private DCC Send/Chat flood protection is now enabled and is currently set to activate on %dccfloodl sends/chats in %dccfloods seconds
  189. n187=..EditSetting:{
  190. n188=  set %temp $$?="How many dcc sends/chats (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  191. n189=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  192. n190=  set %dccfloodl %temp | set %dccfloods %temp2 | unset %temp %temp2 | echo 4 %ver Private DCC Send/Chat flood protection now activates on %dccfloodl sends/chats in %dccfloods seconds when enabled
  193. n191=}
  194. n192=InviteFloodProtection
  195. n193=..Disable:set %invite 0 | echo 4 -a %ver Invite flood protection is now disabled
  196. n194=..Enable- 30SecIgnore:set %invite 1 | echo 4 -a %ver Invite flood protection is now enabled to a 30 second invite ignore
  197. n195=..Enable- KickAndIgnore:set %invite 2 | echo 4 -a %ver Invite flood protection is now enabled to a channel kick (where possible) and a 30 second invite ignore
  198. n196=.-
  199. n197=MiscellaneousSettings
  200. n198=.-
  201. n199=.==> View Current Settings (Also F9) <==:f9
  202. n200=.-
  203. n201=.Immunity
  204. n202=..Disable:set %immune 0 | echo 4 %ver Immunity to all protection is now disabled
  205. n203=..Enable- SuperOps:set %immune 1 | echo 4 %ver Immunity to all protection is now enabled for the super ops
  206. n204=..Enable- SuperOpsAndVoicedUsers:set %immune 2 | echo 4 %ver Immunity to all protection is now enabled for the super ops and the voiced users
  207. n205=..Enable- AllChannelOps:set %immune 3 | echo 4 %ver Immunity to all protection is now enabled for all channel ops
  208. n206=.ChannelFloodingPunishmentSeverity
  209. n207=..BanOnly (AndOpDeop):set %punish 1 | echo 4 %ver Flooding punishment is now enabled to ban only for %punishtimer seconds (and deopping for ops)
  210. n208=..KickAndBan:set %punish 2 | echo 4 %ver Flooding punishment is now enabled to kicking and banning for %punishtimer seconds
  211. n209=..EditBanTimerLength:{
  212. n210=  set %temp $$?="Enter timer length in seconds (default 10)" | if (%temp < 2) || (%temp > 3000) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  213. n211=  set %punishtimer %temp | unset %temp | echo 4 %ver The ban on a flood now lasts for %punishtimer seconds
  214. n212=}
  215. n213=.KickingOnPrivateFlood
  216. n214=..Disable:set %privatekick 0 | echo 4 %ver Kicking on private flood is now disabled
  217. n215=..Enable:set %privatekick 1 | echo 4 %ver Kicking on private flood is now enabled
  218. n216=.CloneOn-JoinDetection
  219. n217=..Disable:set %cloneset 0 | echo 4 %ver The clone on-join detection setting is  now disabled
  220. n218=..Enable- PersonalNotification:set %cloneset 1 | echo 4 %ver The clone on-join detection setting is now enabled to personal notification
  221. n219=..Enable- SetCloneLimitAndKickIfExceeded:{
  222. n220=  set %temp $$?="Enter the clone limit (default 2)" | if (%temp < 1) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  223. n221=  if (%temp == %clonesallowed) && (%cloneset == 2) { echo 4 %ver The clone on-join detection setting is already enabled to a strict %clonesallowed clone limit | unset %temp | halt }
  224. n222=  set %cloneset 2 | set %clonesallowed %temp | unset %temp | echo 4 %ver The clone on-join detection setting has been enabled to a strict %clonesallowed clone limit
  225. n223=}
  226. n224=.ModeChangeProtection
  227. n225=..Disable:set %modeprot 0 | echo 4 %ver Channel mode change protection is now disabled
  228. n226=..Enable- Normal:set %modeprot 1 | echo 4 %ver Channel mode change protection is now enabled with a current setting of + $+ %modeplus $+ - $+ %modeminus
  229. n227=..Enable- Deop:set %modeprot 2 | echo 4 %ver Channel mode change protection is now enabled with a current setting of + $+ %modeplus $+ - $+ %modeminus $+ , and a user deop
  230. n228=..Enable- Kick/Ban:set %modeprot 3 | echo 4 %ver Channel mode change protection is now enabled with a current setting of + $+ %modeplus $+ - $+ %modeminus $+ , and a user kick/ban
  231. n229=..EditSetting:{
  232. n230=  set %temp $$?="Enter your protection plus modes (default tn)" | if ($gettok(%temp,2,32) != $null) { echo 4 %ver Submissions for the mode enforce settings can not be more than one word | unset %temp | halt }
  233. n231=  set %count 0
  234. n232=  :start
  235. n233=  inc %count | if (%count > $len(%temp)) { goto end }
  236. n234=  set %current $mid(%count,1,%temp) | if (%current !isin %modes) { echo 4 %ver The setting of  $+ %current $+  is invalid, please try again | unset %temp %count %current | halt }
  237. n235=  goto start
  238. n236=  :end
  239. n237=  unset %count %current
  240. n238=  if (k isin %temp) { set %tempk $$?="Enter your mode key setting:" } | if ($gettok(%tempk,2,32) != $null) { echo 4 %ver Submissions for the mode key setting can not be more than one word | unset %temp %tempk | halt }
  241. n239=  if (l isin %temp) { set %templ $$?="Enter your mode limit setting" } | if ($gettok(%templ,2,32) != $null) { echo 4 %ver Submissions for the mode limit setting can not be more than one word | unset %temp %tempk %templ | halt }
  242. n240=  if ((%templ < 1) || (%templ > 10000)) && (l isin %temp) { echo 4 %ver Invalid mode limit setting, please try again | unset %temp %tempk %templ | halt }
  243. n241=  set %temp2 $$?="Enter your protection minus modes (default k)" | if ($gettok(%temp2,2,32) != $null) { echo 4 %ver Submissions for the mode enforce settings can not be more than one word | unset %temp2 %temp %tempk %templ | halt }
  244. n242=  set %count 0
  245. n243=  :start2
  246. n244=  inc %count | if (%count > $len(%temp2)) { goto end2 }
  247. n245=  set %current $mid(%count,1,%temp2) | if (%current !isin %modes) { echo 4 %ver The setting of  $+ %current $+  is invalid, please try again | unset %temp %temp2 %tempk %templ %count %current | halt }
  248. n246=  if (%current isin %temp) { echo 4 %ver The setting - %current - was made for both plus and minus mode protection - no changes were made | unset %temp %temp2 %tempk %templ %count %current | halt }
  249. n247=  goto start2
  250. n248=  :end2
  251. n249=  unset %modekey %modelimit | set %modeplus %temp | set %modeminus %temp2 | if (%tempk != null) { set %modekey %tempk }
  252. n250=  if (%templ != $null) { set %modelimit %templ }
  253. n251=  echo 4 %ver Channel mode change protection is now enabled with a current setting of + $+ %modeplus $+ - $+ %modeminus $+ , and this will now be enforced in all channels
  254. n252=  enforcemode | unset %temp %temp2 %tempk %templ %count %current
  255. n253=}
  256. n254=.ServerOpProtection
  257. n255=..Disable:set %serverprot 0 | echo 4 %ver Server Op protection is now disabled
  258. n256=..Enable:set %serverprot 1 | echo 4 %ver Server Op protection is now enabled
  259. n257=.SuperOpAutoOpping
  260. n258=..Disable:set %autoopping 0 | echo 4 %ver Super op auto-opping is now disabled
  261. n259=..Enable:set %autoopping 1 | echo 4 %ver Super op auto-opping is now enabled
  262. n260=.RevengeSetting
  263. n261=..Disable:set %revenge 0 | echo 4 %ver Script revenge is now disabled
  264. n262=..Enable:set %revenge 1 | echo 4 %ver Script revenge is now enabled
  265. n263=.OffensiveNickProtection
  266. n264=..Disable:set %offensivenick 0 | echo 4 %ver Offensive nick protection is now disabled
  267. n265=..Enable:set %offensivenick 1 | echo 4 %ver Offensive nick protection is now enabled
  268. n266=..AddToOffensiveNickList:{
  269. n267=  set %temp $$?="Enter the offensive word to add" | if ($gettok(%temp,2,32) != $null) { echo 4 %ver Submissions for the offensive word list can not be more than one word | unset %temp | halt }
  270. n268=  set %nick %temp | offensivenickcheck | if (%lev != 0) { echo 4 %ver The word  $+ %temp $+  is already on the offensive nick word list | unset %temp | halt }
  271. n269=  write $mircdirsettings\ $+ badnicks.txt %temp | echo 4 %ver The word  $+ %temp $+  has been added to the offensive nick word list | unset %temp
  272. n270=}
  273. n271=.UnallowedTextProtection
  274. n272=..Disable:set %unallowedtext 0 | echo 4 %ver Unallowed text protection is now disabled
  275. n273=..Enable- SilenceBanPunishmentOnly:set %unallowedtext 1 | echo 4 %ver Unallowed text protection is now enabled to a silence ban punishment
  276. n274=..Enable- KickAndBanPunishment:set %unallowedtext 2 | echo 4 %ver Unallowed text protection is now enabled to a kick&ban punishment
  277. n275=..AddToUnallowedTextList:{
  278. n276=  set %temp $$?="Enter the word/phrase to add"
  279. n277=  set %nick %temp | unallowedtextcheck | if (%lev != 0) { echo 4 %ver The choice of  $+ %temp $+  is already on the unallowed text list | unset %temp | halt }
  280. n278=  write $mircdirsettings\ $+ badwords.txt %temp | echo 4 %ver The choice of  $+ %temp $+  has been added to the unallowed text list | unset %temp
  281. n279=}
  282. n280=.IRCopJoinNotification
  283. n281=..Disable:set %ircop 0 | echo 4 %ver IRCop join notification is now disabled
  284. n282=..Enable:set %ircop 1 | echo 4 %ver IRCop join notification is now enabled
  285. n283=.SuperOpsCanOnlyOp
  286. n284=..Disable:set %superonly 0 | echo 4 %ver The super-ops-can-only-op setting is now disabled
  287. n285=..Enable:set %superonly 1 | echo 4 %ver The super-ops-can-only-op setting is now enabled
  288. n286=.ChannelAutoJoin
  289. n287=..Disable:set %autojoin 0 | echo 4 %ver Channel auto-join on startup is now disabled
  290. n288=..Enable:set %autojoin 1 | echo 4 %ver Channel auto-join on startup is now enabled
  291. n289=.AutoPinger
  292. n290=..Disable:set %autoping 0 | echo 4 %ver The channel auto-pinger (when people enter 'ping me') is now disabled
  293. n291=..Enable:set %autoping 1 | echo 4 %ver The channel auto-pinger (when people enter 'ping me') is now enabled
  294. n292=.ViewingCurrentStatistics
  295. n293=..StatusBar:set %display 1 | echo 4 %ver The current statistics are now displayed into the status bar
  296. n294=..IndependentWindow:set %display 2 | echo 4 %ver The current statistics are now displayed into an independent window
  297. n295=.-
  298. n296=-
  299. n297===> SwitchToSimplePopups <==:.load -p spopups.ini
  300. n298=-
  301.  
  302. [qPopup]
  303. n0=Whois:whois $$1
  304. n1=UCentral:uwho $1
  305. n2=-
  306. n3=Pr≥tΘótφ≥╤ v4.0:describe $$1 is using -= The 12Pr≥tΘótφ≥╤ MASTER Script v4.0 =- http://www.iinet.net.au/~ventura/protect.html
  307. n4=-
  308. n5=UserStuff
  309. n6=.View:{
  310. n7=  set %lev1 0
  311. n8=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a Cannot establish a user address for %nick - perform a whois | goto end }
  312. n9=  if (%nick == $me) { echo 4 -a %ver %nick is you! | goto end }
  313. n10=  if ($address(%nick,2) == $address($me,2)) && ($address(%nick,3) == $address($me,3)) { echo 4 -a %ver %nick is one of your clones! | goto end }
  314. n11=  superopcheck | if (%lev != 0) { set %lev1 1 }
  315. n12=  voicedcheck | if (%lev != 0) { set %lev1 2 }
  316. n13=  deniedcheck | if (%lev != 0) { set %lev1 3 }
  317. n14=  shitlistcheck | if (%lev != 0) { set %lev1 4 }
  318. n15=  set %address $address(%nick,2)
  319. n16=  superopcheck | if (%lev != 0) && (%lev1 == 1) { echo 4 -a %ver %nick is on the super ops list by Dynamic IP and Static IP | goto end }
  320. n17=  if (%lev == 0) && (%lev1 == 1) { echo 4 -a %ver %nick is on the super ops list by Dynamic IP | goto end }
  321. n18=  if (%lev != 0) && (%lev1 == 0) { echo 4 -a %ver %nick is on the super ops list by Static IP | goto end }
  322. n19=  voicedcheck | if (%lev != 0) && (%lev1 == 2) { echo 4 -a %ver %nick is on the voiced user list by Dynamic IP and Static IP | goto end }
  323. n20=  if (%lev == 0) && (%lev1 == 2) { echo 4 -a %ver %nick is on the voiced user list by Dynamic IP | goto end }
  324. n21=  if (%lev != 0) && (%lev1 == 0) { echo 4 -a %ver %nick is on the voiced user list by Static IP | goto end }
  325. n22=  deniedcheck | if (%lev != 0) && (%lev1 == 3) { echo 4 -a %ver %nick is on the denied ops list by Dynamic IP and Static IP | goto end }
  326. n23=  if (%lev == 0) && (%lev1 == 3) { echo 4 -a %ver %nick is on the denied ops list by Dynamic IP | goto end }
  327. n24=  if (%lev != 0) && (%lev1 == 0) { echo 4 -a %ver %nick is on the denied ops list by Static IP | goto end }
  328. n25=  shitlistcheck | if (%lev != 0) && (%lev1 == 4) { echo 4 -a %ver %nick is on the shitlist by Dynamic IP and Static IP | goto end }
  329. n26=  if (%lev == 0) && (%lev1 == 4) { echo 4 -a %ver %nick is on the shitlist by Dynamic IP | goto end }
  330. n27=  if (%lev != 0) && (%lev1 == 0) { echo 4 -a %ver %nick is on the shitlist by Static IP | goto end }
  331. n28=  echo 4 -a %ver %nick is not on any of the script's lists
  332. n29=  :end
  333. n30=  unset %nick %address %shit %lev %lev1
  334. n31=}
  335. n32=.Add
  336. n33=..SuperOp- DynamicIP:set %domainadd 1 | set %useradd 1 | adduser $$1
  337. n34=..SuperOp- StaticIP:set %domainadd 2 | set %useradd 1 | adduser $$1
  338. n35=..Voiced- DynamicIP:set %domainadd 1 | set %useradd 2 | adduser $$1
  339. n36=..Voiced- StaticIP:set %domainadd 2 | set %useradd 2 | adduser $$1
  340. n37=..DeniedOp- DynamicIP:set %domainadd 1 | set %useradd 3 | adduser $$1
  341. n38=..DeniedOp- StaticIP:set %domainadd 2 | set %useradd 3 | adduser $$1
  342. n39=..Shitlist- DynamicIP:set %domainadd 1 | set %useradd 4 | adduser $$1
  343. n40=..Shitlist- StaticIP:set %domainadd 2 | set %useradd 4 | adduser $$1
  344. n41=.Remove
  345. n42=..SuperOp:{
  346. n43=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
  347. n44=  superopcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ superop.txt | set %lev1 %lev }
  348. n45=  set %address $address(%nick,2) | superopcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ superop.txt | goto done }
  349. n46=  if (%lev1 != $null) { goto done }
  350. n47=  echo 4 -a %ver %nick is not on the super ops list | goto end
  351. n48=  :done
  352. n49=  echo 4 -a %ver %nick has been removed from the super ops list
  353. n50=  :end
  354. n51=  unset %nick %address %lev %lev1
  355. n52=}
  356. n53=..Voiced:{
  357. n54=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
  358. n55=  voicedcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ voiced.txt | set %lev1 %lev }
  359. n56=  set %address $address(%nick,2) | voicedcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ voiced.txt | goto done }
  360. n57=  if (%lev1 != $null) { goto done }
  361. n58=  echo 4 -a %ver %nick is not on the voiced user list | goto end
  362. n59=  :done
  363. n60=  echo 4 -a %ver %nick has been removed from the voiced user list
  364. n61=  :end
  365. n62=  unset %nick %address %lev %lev1
  366. n63=}
  367. n64=..DeniedOp:{
  368. n65=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
  369. n66=  deniedcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ denied.txt | set %lev1 %lev }
  370. n67=  set %address $address(%nick,2) | deniedcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ denied.txt | goto done }
  371. n68=  if (%lev1 != $null) { goto done }
  372. n69=  echo 4 -a %ver %nick is not on the denied user list | goto end
  373. n70=  :done
  374. n71=  echo 4 -a %ver %nick has been removed from the denied user list
  375. n72=  :end
  376. n73=  unset %nick %address %lev %lev1
  377. n74=}
  378. n75=..Shitlist:{
  379. n76=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
  380. n77=  shitlistcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ shitlist.txt | set %lev1 %lev }
  381. n78=  set %address $address(%nick,2) | shitlistcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ shitlist.txt | goto done }
  382. n79=  if (%lev1 != $null) { goto done }
  383. n80=  echo 4 -a %ver %nick is not on the shitlist | goto end
  384. n81=  :done
  385. n82=  echo 4 -a %ver %nick has been removed from the shitlist
  386. n83=  :end
  387. n84=  unset %nick %address %lev %lev1
  388. n85=}
  389. n86=Ignore
  390. n87=.Priv1Min:.ignore -pu60 $$1 3
  391. n88=.Priv2Mins:.ignore -pu120 $$1 3
  392. n89=.PrivPerm:.ignore -p $$1 3
  393. n90=.Off:.ignore -r $$1 3
  394. n91=Page:.ctcp $$1 page $$?="Enter your page message"
  395. n92=-
  396. n93=CTCP
  397. n94=.Ping:.ctcp $$1 ping
  398. n95=.Finger:.ctcp $$1 finger
  399. n96=.Version:.ctcp $$1 version
  400. n97=.Time:.ctcp $$1 time
  401. n98=.Userinfo:.ctcp $$1 userinfo
  402. n99=.ClientInfo:.ctcp $$1 clientinfo
  403. n100=DCC
  404. n101=.Send:.dcc send $$1
  405.  
  406. [cPopup]
  407. n0=-
  408. n1=Pr≥tΘótφ≥╤ v4.0:/describe # is using -= The 12Pr≥tΘótφ≥╤ MASTER Script v4.0 =- http://www.iinet.net.au/~ventura/protect.html
  409. n2=-
  410. n3=ChannelScans
  411. n4=.-
  412. n5=.StatisticsScan
  413. n6=..PrivateEcho:set %statchan # | set %stat 1 | who %statchan
  414. n7=..PublicMSG:set %statchan # | set %stat 2 | who %statchan
  415. n8=.CloneScan
  416. n9=..PrivateEcho:set %clonechan # | set %stat 1 | who %clonechan
  417. n10=..PublicMSG:set %clonechan # | set %stat 2 | who %clonechan
  418. n11=.IRCopScan
  419. n12=..PrivateEcho:set %ircopchan # | set %stat 1 | who %ircopchan
  420. n13=..PublicMSG:set %ircopchan # | set %stat 2 | who %ircopchan
  421. n14=.-
  422. n15=ChannelTopicLock
  423. n16=.-
  424. n17=.Disable:unset %topiclock [ $+ [ # ] ] %topiccurrent [ $+ [ # ] ] | echo 4 %ver Topic lock for  $+ # $+  is now disabled }
  425. n18=.Enable- SuperOpsImmune + No Punishment:set %topiclock [ $+ [ # ] ] 1 | set %topiccurrent [ $+ [ # ] ] $chan(#).topic | echo 4 %ver Topic lock for  $+ # $+  is now enabled with super ops immunity }
  426. n19=.Enable- Everyone + No Punishment:set %topiclock [ $+ [ # ] ] 2 | set %topiccurrent [ $+ [ # ] ] $chan(#).topic | echo 4 %ver Topic lock for  $+ # $+  is now enabled for everyone }
  427. n20=.Enable- SuperOpsImmune + Deop Punishment:set %topiclock [ $+ [ # ] ] 3 | set %topiccurrent [ $+ [ # ] ] $chan(#).topic | echo 4 %ver Topic lock for  $+ # $+  is now enabled with super ops immunity with a deop punishment }
  428. n21=.Enable- Everyone + Deop Punishment:set %topiclock [ $+ [ # ] ] 4 | set %topiccurrent [ $+ [ # ] ] $chan(#).topic | echo 4 %ver Topic lock for  $+ # $+  is now enabled for everyone with a deop punishment }
  429. n22=.Enable- SuperOpsImmune + KickBan Punishment:set %topiclock [ $+ [ # ] ] 5 | set %topiccurrent [ $+ [ # ] ] $chan(#).topic | echo 4 %ver Topic lock for  $+ # $+  is now enabled with super ops immunity with a KickBan punishment }
  430. n23=.Enable- Everyone + KickBan Punishment:set %topiclock [ $+ [ # ] ] 6 | set %topiccurrent [ $+ [ # ] ] $chan(#).topic | echo 4 %ver Topic lock for  $+ # $+  is now enabled for everyone with a KickBan punishment }
  431. n24=.-
  432. n25=ChannelVote
  433. n26=.-
  434. n27=.OpenVote:{
  435. n28=if (%vote == 1) { echo 4 %ver There is already a vote in progress | halt }
  436. n29=set %votetopic $$?="Enter the topic to vote on"
  437. n30=write -c $mircdirsettings\ $+ vote.txt | set %yesvotes 0 | set %novotes 0 | set %vote 1 | msg # %ver It's time to vote!!
  438. n31=msg # The topic: 4 $+ %votetopic 
  439. n32=msg # --To Vote YES -- '/ctcp $me yes'
  440. n33=msg # --To Vote NO -- '/ctcp $me no'
  441. n34=.enable #vote
  442. n35=.timer60 0 60 msg # Voting is on -- The Topic: 4 $+ %votetopic $+  -- To vote yes '/ctcp $me yes' -- To vote no '/ctcp $me no' %ver
  443. n36=}
  444. n37=.CloseVote:{
  445. n38=if (%vote == 0) { echo 4 %ver There is currently no vote in progress | halt }
  446. n39=.timer60 off | write -c $mircdirsettings\ $+ vote.txt | msg # %ver The Votes are in! The topic was: 4 $+ %votetopic $+ 
  447. n40=msg # -- Votes for yes: %yesvotes
  448. n41=msg # -- Votes for no: %novotes
  449. n42=if (%yesvotes == 0) && (%novotes == 0) { msg # Nobody bother then...sorry to disturb; go back to sleep! | goto end }
  450. n43=if (%yesvotes == %novotes) { msg # No clear winner in that one... | goto end }
  451. n44=if (%novotes == 0) && (%yesvotes > 0) { msg # A unanimous victory for those who voted yes! | goto end }
  452. n45=if (%yesvotes == 0) && (%novotes > 0) { msg # A unanimous victory for those who voted no! | goto end }
  453. n46=msg # Thanx to all those who participated :)
  454. n47=:end
  455. n48=unset %yesvotes %novotes %votetopic %countvote* | set %vote 0 | .disable #vote
  456. n49=}
  457. n50=.-
  458. n51=AutoJoinList
  459. n52=.-
  460. n53=.AddChannel:{
  461. n54=set %count 0
  462. n55=:start
  463. n56=inc %count
  464. n57=if ($read -l $+ %count $mircdirsettings\ $+ autojoin.txt == $null) { goto end }
  465. n58=if ($read -l $+ %count $mircdirsettings\ $+ autojoin.txt == #) { echo 4 %ver This channel already exists in the auto join list | unset %count | halt }
  466. n59=goto start
  467. n60=:end
  468. n61=write $mircdirsettings\ $+ autojoin.txt #
  469. n62=echo 4 %ver This channel has been added to the auto-join list
  470. n63=unset %count
  471. n64=}
  472. n65=.RemoveChannel:{
  473. n66=set %count 0
  474. n67=:start
  475. n68=inc %count
  476. n69=if ($read -l $+ %count $mircdirsettings\ $+ autojoin.txt == $null) { goto end }
  477. n70=if ($read -l $+ %count $mircdirsettings\ $+ autojoin.txt == #) { echo 4 %ver This channel has been removed from the auto join list | write -dl $+ %count $mircdirsettings\ $+ autojoin.txt | unset %count | halt }
  478. n71=goto start
  479. n72=:end
  480. n73=echo 4 %ver This channel is not in the auto-join list
  481. n74=unset %count
  482. n75=}
  483. n76=.-
  484. n77=Away/BackOptions
  485. n78=.-
  486. n79=.SetAway:{
  487. n80=if (%away != $null) { echo 4 %ver You are already set as away | halt }
  488. n81=set %away $$?="Enter an away message" | set %awaytime $ctime | if (%pager == 1) { .enable #away }
  489. n82=set %pages 0 | set %messages 0 | awaytitle
  490. n83=awaystart
  491. n84=if (%meaway != $null) { set %oldme $me | nick %meaway | goto next }
  492. n85=:next
  493. n86=.timer50 0 %awaytimer awaytime | .timer53 off | .timer52 off
  494. n87=}
  495. n88=.SetBack:{
  496. n89=if (%away == $null) { echo 4 %ver You are not currently set as away | halt }
  497. n90=away | .timer50 off | set %awaytime $ctime - %awaytime
  498. n91=/ame is back (was away for $duration(%awaytime) $+ ) %ver | if (%oldme != $null) { nick %oldme | unset %oldme }
  499. n92=.disable #away | unset %away | if (%pages > 0) || (%messages > 0) { echo 4 %ver You have been paged and/or messaged since you were last here } | unset %pages %messages
  500. n93=unset %awaytime %awaytime2 | if (%idleaway != $null) { .timer53 1 %idleaways .timer52 0 1 idle }
  501. n94=titlebar Pr≥tΘótφ≥╤ MASTER Script v4.0 (c) 1997 Ventura
  502. n95=:end
  503. n96=}
  504. n97=.ChangeAwayMessage:{
  505. n98=if (%away == $null) { echo 4 %ver You have to be set as away to edit your away message | halt }
  506. n99=.timer50 off | set %away $$?="Enter a new away message" | awaytime | .timer50 0 %awaytimer awaytime
  507. n100=:end
  508. n101=}
  509. n102=.EditAwayMessageTimerLength:{
  510. n103=set %temp $$?="Enter the away msg timer length in mins (default 10)"
  511. n104=if (%temp < 1) || (%temp > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  512. n105=set %awaytimer %temp * 60 | echo 4 %ver Your away message timer now displays every %temp minutes | unset %temp
  513. n106=if (%away != $null) { .timer50 0 %awaytimer awaytime }
  514. n107=}
  515. n108=.Page/MessageFile
  516. n109=..Read:run notepad.exe $mircdirsettings\ $+ messages.txt
  517. n110=..Clear:write -c $mircdirsettings\ $+ messages.txt | echo 4 %ver Message File Cleared
  518. n111=.CustomiseAwayNickname
  519. n112=..Set:{
  520. n113=if (%away != $null) { echo 4 %ver You have to be not set as away to edit your away nickname | halt }
  521. n114=set %meaway $$?="Enter a preferred away nickname"
  522. n115=echo 4 %ver Your nickname will now change to  $+ %meaway $+  when you are away
  523. n116=}
  524. n117=..Clear:{
  525. n118=if (%meaway == $null) { echo 4 %ver You do not currently have a customised away nickname | halt }
  526. n119=if (%away != $null) { echo 4 %ver You have to be not set as away to edit your away nickname | halt }
  527. n120=unset %meaway | echo 4 %ver Your customised away nickname has been cleared - when away now, your normal nickname will not change
  528. n121=}
  529. n122=.RecordingOptions
  530. n123=..Pager
  531. n124=...Disable:if (%pager == 0) { echo 4 %ver The away pager is already disabled } | else { set %pager 0 | .disable #away | echo 4 %ver The away pager has been disabled | if (%away != $null) { .disable #away } }
  532. n125=...Enable:if (%pager == 1) { echo 4 %ver The away pager is already enabled } | else { set %pager 0 | echo 4 %ver The away pager has been enabled | if (%away != $null) { .enable #away } }
  533. n126=..MsgLogger
  534. n127=...Disable:if (%messager == 0) { echo 4 %ver The away msg logger is already disabled } | else { set %messager 0 | echo 4 %ver The away msg logger has been disabled }
  535. n128=...Enable:if (%messager == 1) { echo 4 %ver The away msg logger is already enabled } | else { set %messager 1 | echo 4 %ver The away msg logger has been enabled  }
  536. n129=.AutoIdleAwayOptions
  537. n130=..Disable:{
  538. n131=if (%away != $null) { echo 4 %ver You have to be not set as away to edit the Auto Idle Away settings | halt }
  539. n132=if (%idleaway == 0) { echo 4 %ver Auto Idle away is already disabled } | else { set %idleaway 0 | .timer53 off | .timer52 off | echo 4 %ver Auto Idle away has been disabled }
  540. n133=}
  541. n134=..Enable:{
  542. n135=if (%away != $null) { echo 4 %ver You have to be not set as away to edit the Auto Idle Away settings | halt }
  543. n136=if (%idleaway == 1) { echo 4 %ver Auto Idle away is already enabled (timer currently set to %idleaways seconds) } | else { set %idleaway 1 | .timer52 off | .timer53 1 %idleaways .timer52 0 1 idle | echo 4 %ver Auto Idle away has been enabled and is set to operate if idle for %idleaways seconds }
  544. n137=}
  545. n138=..EditIdleAwayTimerLength:{
  546. n139=if (%away != $null) { echo 4 %ver You have to be not set as away to edit the Auto Idle Away settings | halt }
  547. n140=set %temp $$?="Enter the idle away timer in mins (default 10)" | if (%temp < 1) || (%temp > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  548. n141=set %idleaways %temp * 60 | echo 4 %ver The Auto Idle away timer has been set to %temp minutes | unset %temp
  549. n142=.timer52 off | .timer53 1 %idleaways .timer52 0 1 idle
  550. n143=}
  551. n144=.-
  552. n145=TopicChanges
  553. n146=.-
  554. n147=.WelcomeTo...:topic # ╕.╖┤»`╖.╕╕.╖┤»`╖.╕╕.╖┤»`╖.╕.╖> Welcome to $chan <╖.╕.╖┤»`╖.╕╕.╖┤»`╖.╕╕.╖┤»`╖.╕ | enforcemode
  555. n148=.GrabFromNearest:topic # Grab the latest -= Pr≥tΘótφ≥╤ MASTER Script =- from your local mIRC scripts store! | enforcemode
  556. n149=.-
  557. n150=DALnet
  558. n151=.-
  559. n152=.ChanServ
  560. n153=..IdentifyWithChannelPassword:{
  561. n154=if (%chanpass == $null) { set %chanpass $$?="Enter the ChanServ pass used from now on" }
  562. n155=msg chanserv identify # %chanpass
  563. n156=}
  564. n157=..ChangeChannelPassword:{
  565. n158=if (%nickpass == $null) { echo 4 %ver There is no current nickserv password | halt }
  566. n159=set %nickpass $$?="Enter the new NickServ pass used from now on"
  567. n160=}
  568. n161=..OpMeOnThisChannel:msg chanserv op # $me
  569. n162=..ChannelMassDeop:msg chanserv mdeop #
  570. n163=..ChannelMassKick:msg chanserv mkick #
  571. n164=..ChannelInfo:msg chanserv info #
  572. n165=..ListAOPs:msg chanserv aop # list
  573. n166=..ListSOPs:msg chanserv sop # list
  574. n167=..ListAKICKs:msg chanserv akick # list
  575. n168=.NickServ
  576. n169=..IdentifyWithNicknamePassword:{
  577. n170=if (%nickpass == $null) { set %nickpass $$?="Enter the NickServ pass used from now on" }
  578. n171=msg nickserv identify %nickpass
  579. n172=}
  580. n173=..ChangeNicknamePassword:{
  581. n174=if (%nickpass == $null) { echo 4 %ver There is no current nickserv password | halt }
  582. n175=set %nickpass $$?="Enter the new NickServ pass used from now on"
  583. n176=}
  584. n177=..Access
  585. n178=...List:msg nickserv access list
  586. n179=...Add:msg nickserv access add $$?="Enter the domain path to add"
  587. n180=...Remove:msg nickserv access remove $$?="Enter the domain path to remove"
  588. n181=.-
  589. n182=-
  590. n183===> SwitchToSimplePopups <==:.load -p spopups.ini
  591. n184=-
  592.  
  593. [lPopup]
  594. n0=Whois:/whois $$1
  595. n1=Query:/query $$1
  596. n2=UCentral:/uwho $1
  597. n3=-
  598. n4=Pr≥tΘótφ≥╤ v4.0:/describe # is using -= The 12Pr≥tΘótφ≥╤ MASTER Script v4.0 =- http://www.iinet.net.au/~ventura/protect.html
  599. n5=-
  600. n6=UserStuff
  601. n7=.View:{
  602. n8=  set %lev1 0
  603. n9=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a Cannot establish a user address for %nick - perform a whois | goto end }
  604. n10=  if (%nick == $me) { echo 4 -a %ver %nick is you! | goto end }
  605. n11=  if ($address(%nick,2) == $address($me,2)) && ($address(%nick,3) == $address($me,3)) { echo 4 -a %ver %nick is one of your clones! | goto end }
  606. n12=  superopcheck | if (%lev != 0) { set %lev1 1 }
  607. n13=  voicedcheck | if (%lev != 0) { set %lev1 2 }
  608. n14=  deniedcheck | if (%lev != 0) { set %lev1 3 }
  609. n15=  shitlistcheck | if (%lev != 0) { set %lev1 4 }
  610. n16=  set %address $address(%nick,2)
  611. n17=  superopcheck | if (%lev != 0) && (%lev1 == 1) { echo 4 -a %ver %nick is on the super ops list by Dynamic IP and Static IP | goto end }
  612. n18=  if (%lev == 0) && (%lev1 == 1) { echo 4 -a %ver %nick is on the super ops list by Dynamic IP | goto end }
  613. n19=  if (%lev != 0) && (%lev1 == 0) { echo 4 -a %ver %nick is on the super ops list by Static IP | goto end }
  614. n20=  voicedcheck | if (%lev != 0) && (%lev1 == 2) { echo 4 -a %ver %nick is on the voiced user list by Dynamic IP and Static IP | goto end }
  615. n21=  if (%lev == 0) && (%lev1 == 2) { echo 4 -a %ver %nick is on the voiced user list by Dynamic IP | goto end }
  616. n22=  if (%lev != 0) && (%lev1 == 0) { echo 4 -a %ver %nick is on the voiced user list by Static IP | goto end }
  617. n23=  deniedcheck | if (%lev != 0) && (%lev1 == 3) { echo 4 -a %ver %nick is on the denied ops list by Dynamic IP and Static IP | goto end }
  618. n24=  if (%lev == 0) && (%lev1 == 3) { echo 4 -a %ver %nick is on the denied ops list by Dynamic IP | goto end }
  619. n25=  if (%lev != 0) && (%lev1 == 0) { echo 4 -a %ver %nick is on the denied ops list by Static IP | goto end }
  620. n26=  shitlistcheck | if (%lev != 0) && (%lev1 == 4) { echo 4 -a %ver %nick is on the shitlist by Dynamic IP and Static IP | goto end }
  621. n27=  if (%lev == 0) && (%lev1 == 4) { echo 4 -a %ver %nick is on the shitlist by Dynamic IP | goto end }
  622. n28=  if (%lev != 0) && (%lev1 == 0) { echo 4 -a %ver %nick is on the shitlist by Static IP | goto end }
  623. n29=  echo 4 -a %ver %nick is not on any of the script's lists
  624. n30=  :end
  625. n31=  unset %nick %address %shit %lev %lev1
  626. n32=}
  627. n33=.Add
  628. n34=..SuperOp- DynamicIP:set %domainadd 1 | set %useradd 1 | adduser $$1
  629. n35=..SuperOp- StaticIP:set %domainadd 2 | set %useradd 1 | adduser $$1
  630. n36=..Voiced- DynamicIP:set %domainadd 1 | set %useradd 2 | adduser $$1
  631. n37=..Voiced- StaticIP:set %domainadd 2 | set %useradd 2 | adduser $$1
  632. n38=..DeniedOp- DynamicIP:set %domainadd 1 | set %useradd 3 | adduser $$1
  633. n39=..DeniedOp- StaticIP:set %domainadd 2 | set %useradd 3 | adduser $$1
  634. n40=..Shitlist- DynamicIP:set %domainadd 1 | set %useradd 4 | adduser $$1
  635. n41=..Shitlist- StaticIP:set %domainadd 2 | set %useradd 4 | adduser $$1
  636. n42=.Remove
  637. n43=..SuperOp:{
  638. n44=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
  639. n45=  superopcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ superop.txt | set %lev1 %lev }
  640. n46=  set %address $address(%nick,2) | superopcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ superop.txt | goto done }
  641. n47=  if (%lev1 != $null) { goto done }
  642. n48=  echo 4 -a %ver %nick is not on the super ops list | goto end
  643. n49=  :done
  644. n50=  echo 4 -a %ver %nick has been removed from the super ops list
  645. n51=  :end
  646. n52=  unset %nick %address %lev %lev1
  647. n53=}
  648. n54=..Voiced:{
  649. n55=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
  650. n56=  voicedcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ voiced.txt | set %lev1 %lev }
  651. n57=  set %address $address(%nick,2) | voicedcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ voiced.txt | goto done }
  652. n58=  if (%lev1 != $null) { goto done }
  653. n59=  echo 4 -a %ver %nick is not on the voiced user list | goto end
  654. n60=  :done
  655. n61=  echo 4 -a %ver %nick has been removed from the voiced user list
  656. n62=  :end
  657. n63=  unset %nick %address %lev %lev1
  658. n64=}
  659. n65=..DeniedOp:{
  660. n66=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
  661. n67=  deniedcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ denied.txt | set %lev1 %lev }
  662. n68=  set %address $address(%nick,2) | deniedcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ denied.txt | goto done }
  663. n69=  if (%lev1 != $null) { goto done }
  664. n70=  echo 4 -a %ver %nick is not on the denied user list | goto end
  665. n71=  :done
  666. n72=  echo 4 -a %ver %nick has been removed from the denied user list
  667. n73=  :end
  668. n74=  unset %nick %address %lev %lev1
  669. n75=}
  670. n76=..Shitlist:{
  671. n77=  set %nick $$1 | set %address $address(%nick,3) | if (%address == $null) { echo 4 -a %ver Cannot establish a user address...perform a whois | goto end }
  672. n78=  shitlistcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ shitlist.txt | set %lev1 %lev }
  673. n79=  set %address $address(%nick,2) | shitlistcheck | if (%lev != 0) { write -dl $+ %lev $mircdirsettings\ $+ shitlist.txt | goto done }
  674. n80=  if (%lev1 != $null) { goto done }
  675. n81=  echo 4 -a %ver %nick is not on the shitlist | goto end
  676. n82=  :done
  677. n83=  echo 4 -a %ver %nick has been removed from the shitlist
  678. n84=  :end
  679. n85=  unset %nick %address %lev %lev1
  680. n86=}
  681. n87=BaseControl
  682. n88=.Give Ops:mode # +oooo $$1 $2 $3 $4 | mode # +oooo $5 $6 $7 $8 | mode # +oooo $9 $10 $11 $12
  683. n89=.Deop:mode # -oooo $$1 $2 $3 $4 | mode # -oooo $5 $6 $7 $8 | mode # -oooo $9 $10 $11 $12
  684. n90=.Give Voice:mode # +vvvv $$1 $2 $3 $4 | mode # +vvvv $5 $6 $7 $8 | mode # +vvvv $9 $10 $11 $12
  685. n91=.De Voice:mode # -vvvv $$1 $2 $3 $4 | mode # -vvvv $5 $6 $7 $8 | mode # -vvvv $9 $10 $11 $12
  686. n92=.Deop And Voice:mode # -oooo $$1 $2 $3 $4 | mode # +vvvv $$1 $2 $3 $4
  687. n93=Kick/Ban
  688. n94=.Kick- Normal:kick # $$1 %ver 
  689. n95=.Kick- EnterMSG:kick # $$1 %ver $$?="Enter a Kick message"
  690. n96=.Ban- JustTheBan:mode # +bb $address($$1,3)
  691. n97=.KickBan- 2Mins:mode # -o+bb $$1 $address($$1,2) $address($$1,3) | kick # $$1 %ver -=Temp Ban=- | .timer 1 120 mode # -b $address($$1,3)
  692. n98=.KickBan- Permanent:mode # -o+bb $$1 $address($$1,2) $address($$1,3) | kick # $$1 %ver -=Perm Ban=-
  693. n99=.KickBan- EnterMSG:set %kickmsg $$?="Enter a kick/ban message" | mode # -o+bb $$1 $address($$1,2) $address($$1,3) | kick # $$1 %kickmsg | unset %kickmsg
  694. n100=Ignore
  695. n101=.On:.ignore $$1 3
  696. n102=.OnTemp60:.ignore -u60 $$1 3
  697. n103=.Off:.ignore -r $$1 3
  698. n104=Page:.ctcp $$1 page $$?="Enter your page message"
  699. n105=DALnet
  700. n106=.ChanServ
  701. n107=..OpOnChan:msg chanserv op # $$1
  702. n108=..DeopOnChan:msg chanserv deop # $$1
  703. n109=..Access:msg chanserv access # $$1
  704. n110=..Add
  705. n111=...AOP:msg chanserv aop # add $$1
  706. n112=...SOP:msg chanserv sop # add $$1
  707. n113=...AKICK:msg chanserv akick # add $$1
  708. n114=..Del
  709. n115=...AOP:msg chanserv aop # del $$1
  710. n116=...SOP:msg chanserv sop # del $$1
  711. n117=...AKICK:msg chanserv akick # del $$1
  712. n118=.NickServ
  713. n119=..Ghost:msg nickserv ghost $$1
  714. n120=-
  715. n121=CTCP
  716. n122=.Ping:/ctcp $$1 ping
  717. n123=.Finger:/ctcp $$1 finger
  718. n124=.Version:/ctcp $$1 version
  719. n125=.Time:/ctcp $$1 time
  720. n126=.Userinfo:/ctcp $$1 userinfo
  721. n127=.ClientInfo:/ctcp $$1 clientinfo
  722. n128=DCC
  723. n129=.Send:/dcc send $$1
  724. n130=.Chat:/dcc chat $$1
  725. n131=-
  726. n132=Slap!:/me slaps $$1 around a bit with a large trout
  727.  
  728. [bPopup]
  729. n0=Pr≥tΘótφ≥╤ v4.0
  730. n1=-
  731. n2=Pr≥tΘótφ≥╤ v4.0:.echo 6 -s You are using -= The 12Pr≥tΘótφ≥╤ MASTER Script v4.0 =- http://www.iinet.net.au/~ventura/protect.html
  732. n3=-
  733. n4=ChannelFloodProtectionSettings
  734. n5=.-
  735. n6=.==> View Current Settings (Also F5) <==:f5
  736. n7=.-
  737. n8=.ChannelTextFlood
  738. n9=..Disable:set %textflood 0 | echo 4 %ver Channel text flood protection is now disabled
  739. n10=..Enable:set %textflood 1 | echo 4 %ver Channel text flood protection is now enabled and is currently set to activate on %textfloodl lines in %textfloods seconds
  740. n11=..EditSetting:{
  741. n12=  set %temp $$?="How many lines of text (default 5)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  742. n13=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  743. n14=  set %textfloodl %temp | set %textfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel text flood protection now activates on %textfloodl lines in %textfloods seconds when enabled
  744. n15=}
  745. n16=.ChannelJoin-PartFlood
  746. n17=..Disable:set %joinpartflood 0 | echo 4 %ver Channel join-part flood protection is now disabled
  747. n18=..Enable:set %joinpartflood 1 | echo 4 %ver Channel join-part flood protection is now enabled and is currently set to activate on %joinpartfloodl joins and parts in %joinpartfloods seconds
  748. n19=..EditSetting:{
  749. n20=  set %temp $$?="How many joins and parts (default 3)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  750. n21=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  751. n22=  set %joinpartfloodl %temp | set %joinpartfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel join-part flood protection now activates on %joinpartfloodl joins and parts in %joinpartfloods seconds when enabled
  752. n23=}
  753. n24=.ChannelNick-ChangeFlood
  754. n25=..Disable:set %nickflood 0 | echo 4 %ver Channel nick-change flood protection is now disabled
  755. n26=..Enable:set %nickflood 1 | echo 4 %ver Channel nick-change flood protection is now enabled and is currently set to activate on %nickfloodl nick changes in %nickfloods seconds
  756. n27=..EditSetting:{
  757. n28=  set %temp $$?="How many nick changes (default 3)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  758. n29=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  759. n30=  set %nickfloodl %temp | set %nickfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel nick-change flood protection now activates on %nickfloodl nick changes in %nickfloods seconds when enabled
  760. n31=}
  761. n32=.ChannelRepeatingFlood
  762. n33=..Disable:set %repflood 0 | echo 4 %ver Channel repeating flood protection is now disabled
  763. n34=..Enable:set %repflood 1 | echo 4 %ver Channel repeating flood protection is now enabled and is currently set to activate on %repfloodl repeats in %repfloods seconds
  764. n35=..EditSetting:{
  765. n36=  set %temp $$?="How many repeats (default 3)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  766. n37=  set %temp2 $$?="In how many seconds (default 10)" | if (%temp2 < 2) || (%temp2 > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  767. n38=  set %repfloodl %temp | set %repfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel repeating flood protection now activates on %repfloodl repeats in %repfloods seconds when enabled
  768. n39=}
  769. n40=.ChannelLengthFlood
  770. n41=..Disable:set %lengthflood 0 | echo 4 %ver Channel length flood protection is now disabled
  771. n42=..Enable:set %lengthflood 1 | echo 4 %ver Channel length flood protection is now enabled and is currently set to activate on text containing over %lengthfloodl characters
  772. n43=..EditSetting:{
  773. n44=  set %temp $$?="Enter the length limit (default 350)" | if (%temp < 100) || (%temp > 600) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  774. n45=  set %lengthfloodl %temp | unset %temp | echo 4 %ver Channel length flood protection now activates on text over %lengthfloodl characters when enabled
  775. n46=}
  776. n47=.ChannelColourFlood
  777. n48=..Disable:set %colourflood 0 | echo 4 %ver Channel colour flood protection is now disabled
  778. n49=..Enable:set %colourflood 1 | echo 4 %ver Channel colour flood protection is now enabled and is currently set to activate on text containing over %colourfloodl colour changes
  779. n50=..EditSetting:{
  780. n51=  set %temp $$?="Enter the colour change limit (default 30)" | if (%temp < 5) || (%temp > 200) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  781. n52=  set %colourfloodl %temp | unset %temp | echo 4 %ver Channel colour flood protection now activates on text containing over %colourfloodl colour changes when enabled
  782. n53=}
  783. n54=.ChannelCAPSFlood
  784. n55=..Disable:set %capsflood 0 | echo 4 %ver Channel CAPS flood protection is now disabled
  785. n56=..Enable:set %capsflood 1 | echo 4 %ver Channel CAPS flood protection is now enabled and is currently set to activate on text over %capsfloodl characters
  786. n57=..EditSetting:{
  787. n58=  set %temp $$?="Enter the CAPS length limit (default 50)" | if (%temp < 10) || (%temp > 600) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  788. n59=  set %capsfloodl %temp | unset %temp | echo 4 %ver Channel caps flood protection now activates on text over %capsfloodl characters when enabled
  789. n60=}
  790. n61=.ChannelSoundFlood
  791. n62=..Disable:set %soundflood 0 | echo 4 %ver Channel sound flood protection is now disabled
  792. n63=..Enable:set %soundflood 1 | echo 4 %ver Channel sound flood protection is now enabled and is currently set to activate on %soundfloodl sound requests in %soundfloods seconds
  793. n64=..EditSetting:{
  794. n65=  set %temp $$?="How many sound request (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  795. n66=  set %temp2 $$?="In how many seconds (default 10)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  796. n67=  set %soundfloodl %temp | set %soundfloods %temp2 | unset %temp %temp2 | echo 4 %ver Channel sound flood protection now activates on %soundfloodl sound requests in %soundfloods seconds when enabled
  797. n68=}
  798. n69=.-
  799. n70=ChannelMassModeProtectionSettings
  800. n71=.-
  801. n72=.==> View Current Settings (Also F6) <==:f6
  802. n73=.-
  803. n74=.MassDeopProtection
  804. n75=..Disable:set %massdeop 0 | echo 4 %ver Mass deop protection is now disabled
  805. n76=..Enable:set %massdeop 1 | echo 4 %ver Mass deop protection is now enabled and is currently set to activate on %massdeopl deops in %massdeops seconds
  806. n77=..EditSetting:{
  807. n78=  set %temp $$?="How many deops (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  808. n79=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  809. n80=  set %massdeopl %temp | set %massdeops %temp2 | unset %temp %temp2 | echo 4 %ver Mass deop protection now activates on %massdeopl deops in %massdeops seconds when enabled
  810. n81=}
  811. n82=.MassOpProtection
  812. n83=..Disable:set %massop 0 | echo 4 %ver Mass op protection is now disabled
  813. n84=..Enable:set %massop 1 | echo 4 %ver Mass op protection is now enabled and is currently set to activate on %massopl ops in %massops seconds
  814. n85=..EditSetting:{
  815. n86=  set %temp $$?="How many ops (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  816. n87=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  817. n88=  set %massopl %temp | set %massops %temp2 | unset %temp %temp2 | echo 4 %ver Mass op protection now activates on %massopl ops in %massops seconds when enabled
  818. n89=}
  819. n90=.MassKickProtection
  820. n91=..Disable:set %masskick 0 | echo 4 %ver Mass kick protection is now disabled
  821. n92=..Enable:set %masskick 1 | echo 4 %ver Mass kick protection is now enabled and is currently set to activate on %masskickl kicks in %masskicks seconds
  822. n93=..EditSetting:{
  823. n94=  set %temp $$?="How many kicks (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  824. n95=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  825. n96=  set %masskickl %temp | set %masskicks %temp2 | unset %temp %temp2 | echo 4 %ver Mass kick protection now activates on %masskickl kicks in %masskicks seconds when enabled
  826. n97=}
  827. n98=.MassBanProtection
  828. n99=..Disable:set %massban 0 | echo 4 %ver Mass ban protection is now disabled
  829. n100=..Enable:set %massban 1 | echo 4 %ver Mass ban protection is now enabled and is currently set to activate on %massbanl bans in %massbans seconds
  830. n101=..EditSetting:{
  831. n102=  set %temp $$?="How many bans (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  832. n103=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  833. n104=  set %massbanl %temp | set %massbans %temp2 | unset %temp %temp2 | echo 4 %ver Mass ban protection now activates on %massbanl bans in %massbans seconds when enabled
  834. n105=}
  835. n106=.MassDevoiceProtection
  836. n107=..Disable:set %massdevoice 0 | echo 4 %ver Mass devoice protection is now disabled
  837. n108=..Enable:set %massdevoice 1 | echo 4 %ver Mass devoice protection is now enabled and is currently set to activate on %massdevoicel devoices in %massdevoices seconds
  838. n109=..EditSetting:{
  839. n110=  set %temp $$?="How many devoices (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  840. n111=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  841. n112=  set %massdevoicel %temp | set %massdevoices %temp2 | unset %temp %temp2 | echo 4 %ver Mass devoice protection now activates on %massdevoicel devoices in %massdevoices seconds when enabled
  842. n113=}
  843. n114=.-
  844. n115=PrivateFloodProtectionSettings
  845. n116=.-
  846. n117=.==> View Current Settings (Also F7) <==:f7
  847. n118=.-
  848. n119=.PrivateMSGFlood
  849. n120=..Disable:set %privatemsgflood 0 | echo 4 %ver Private MSG flood protection is now disabled
  850. n121=..Enable:set %privatemsgflood 1 | echo 4 %ver Private MSG flood protection is now enabled and is currently set to activate on %privatemsgfloodl msgs in %privatemsgfloods seconds
  851. n122=..EditSetting:{
  852. n123=  set %temp $$?="How many msg's (default 5)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  853. n124=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  854. n125=  set %privatemsgfloodl %temp | set %privatemsgfloods %temp2 | unset %temp %temp2 | echo 4 %ver Private MSG flood protection now activates on %privatemsgfloodl msgs in %privatemsgfloods seconds when enabled
  855. n126=}
  856. n127=.PrivateNoticeFlood
  857. n128=..Disable:set %privatenoticeflood 0 | echo 4 %ver Private Notice flood protection is now disabled
  858. n129=..Enable:set %privatenoticeflood 1 | echo 4 %ver Private Notice flood protection is now enabled and is currently set to activate on %privatenoticefloodl notices in %privatenoticefloods seconds
  859. n130=..EditSetting:{
  860. n131=  set %temp $$?="How many notices (default 5)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  861. n132=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  862. n133=  set %privatenoticefloodl %temp | set %privatenoticefloods %temp2 | unset %temp %temp2 | echo 4 %ver Private Notice flood protection now activates on %privatenoticefloodl msgs in %privatenoticefloods seconds when enabled
  863. n134=}
  864. n135=.PrivateRepeatingFlood
  865. n136=..Disable:set %repfloodp 0 | echo 4 %ver Private repeating flood protection is now disabled
  866. n137=..Enable:set %repfloodp 1 | echo 4 %ver Private repeating flood protection is now enabled and is currently set to activate on %repfloodpl repeats in %repfloodps seconds
  867. n138=..EditSetting:{
  868. n139=  set %temp $$?="How many repeats (default 3)" | if (%temp < 2) || (%temp > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  869. n140=  set %temp2 $$?="In how many seconds (default 10)" | if (%temp2 < 2) || (%temp2 > 50) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  870. n141=  set %repfloodpl %temp | set %repfloodps %temp2 | unset %temp %temp2 | echo 4 %ver Private repeating flood protection now activates on %repfloodpl repeats in %repfloodps seconds when enabled
  871. n142=}
  872. n143=.PrivateLengthFlood
  873. n144=..Disable:set %lengthfloodp 0 | echo 4 %ver Private length flood protection is now disabled
  874. n145=..Enable:set %lengthfloodp 1 | echo 4 %ver Private length flood protection is now enabled and is currently set to activate on text containing over %lengthfloodpl characters
  875. n146=..EditSetting:{
  876. n147=  set %temp $$?="Enter the length limit (default 350)" | if (%temp < 100) || (%temp > 600) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  877. n148=  set %lengthfloodpl %temp | unset %temp | echo 4 %ver Private length flood protection now activates on text over %lengthfloodpl characters when enabled
  878. n149=}
  879. n150=.PrivateColourFlood
  880. n151=..Disable:set %colourfloodp 0 | echo 4 %ver Private colour flood protection is now disabled
  881. n152=..Enable:set %colourfloodp 1 | echo 4 %ver Private colour flood protection is now enabled and is currently set to activate on text containing over %colourfloodpl colour changes
  882. n153=..EditSetting:{
  883. n154=  set %temp $$?="Enter the colour change limit (default 30)" | if (%temp < 5) || (%temp > 200) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  884. n155=  set %colourfloodpl %temp | unset %temp | echo 4 %ver Private colour flood protection now activates on text containing over %colourfloodpl colour changes when enabled
  885. n156=}
  886. n157=.PrivateCAPSFlood
  887. n158=..Disable:set %capsfloodp 0 | echo 4 %ver Private CAPS flood protection is now disabled
  888. n159=..Enable:set %capsfloodp 1 | echo 4 %ver Private CAPS flood protection is now enabled and is currently set to activate on text over %capsfloodpl characters
  889. n160=..EditSetting:{
  890. n161=  set %temp $$?="Enter the CAPS length limit (default 50)" | if (%temp < 10) || (%temp > 600) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  891. n162=  set %capsfloodpl %temp | unset %temp | echo 4 %ver Private caps flood protection now activates on text over %capsfloodpl characters when enabled
  892. n163=}
  893. n164=.DCCTextFlood
  894. n165=..Disable:set %dcctextflood 0 | echo 4 %ver DCC Text flood protection is now disabled
  895. n166=..Enable:set %dcctextflood 1 | echo 4 %ver DCC Text flood protection is now enabled and is currently set to activate on %dcctextfloodl dcc texts in %dcctextfloods seconds
  896. n167=..EditSetting:{
  897. n168=  set %temp $$?="How many lines of text (default 5)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  898. n169=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  899. n170=  set %dcctextfloodl %temp | set %dcctextfloods %temp2 | unset %temp %temp2 | echo 4 %ver DCC text flood protection now activates on %dcctextfloodl msgs in %dcctextfloods seconds when enabled
  900. n171=}
  901. n172=.-
  902. n173=PrivateCTCPProtectionSettings
  903. n174=.-
  904. n175=.==> View Current Settings (Also F8) <==:f8
  905. n176=.-
  906. n177=.PrivateCTCPFlood
  907. n178=..Disable:set %ctcpflood 0 | echo 4 %ver Private CTCP flood protection is now disabled
  908. n179=..Enable:set %ctcpflood 1 | echo 4 %ver Private CTCP flood protection is now enabled and is currently set to activate on %ctcpfloodl ctcps in %ctcpfloods seconds
  909. n180=..EditSetting:{
  910. n181=  set %temp $$?="How many ctcp's (default 2)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  911. n182=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  912. n183=  set %ctcpfloodl %temp | set %ctcpfloods %temp2 | unset %temp %temp2 | echo 4 %ver Private CTCP flood protection now activates on %ctcpfloodl ctcps in %ctcpfloods seconds when enabled
  913. n184=}
  914. n185=.PrivateDCCSend/ChatFlood
  915. n186=..Disable:set %dccflood 0 | echo 4 %ver Private DCC Send/Chat flood protection is now disabled
  916. n187=..Enable:set %dccflood 1 | echo 4 %ver Private DCC Send/Chat flood protection is now enabled and is currently set to activate on %dccfloodl sends/chats in %dccfloods seconds
  917. n188=..EditSetting:{
  918. n189=  set %temp $$?="How many dcc sends/chats (default 3)" | if (%temp < 2) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  919. n190=  set %temp2 $$?="In how many seconds (default 5)" | if (%temp2 < 2) || (%temp2 > 60) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  920. n191=  set %dccfloodl %temp | set %dccfloods %temp2 | unset %temp %temp2 | echo 4 %ver Private DCC Send/Chat flood protection now activates on %dccfloodl sends/chats in %dccfloods seconds when enabled
  921. n192=}
  922. n193=InviteFloodProtection
  923. n194=..Disable:set %invite 0 | echo 4 -a %ver Invite flood protection is now disabled
  924. n195=..Enable- 30SecIgnore:set %invite 1 | echo 4 -a %ver Invite flood protection is now enabled to a 30 second invite ignore
  925. n196=..Enable- KickAndIgnore:set %invite 2 | echo 4 -a %ver Invite flood protection is now enabled to a channel kick (where possible) and a 30 second invite ignore
  926. n197=.-
  927. n198=MiscellaneousSettings
  928. n199=.-
  929. n200=.==> View Current Settings (Also F9) <==:f9
  930. n201=.-
  931. n202=.Immunity
  932. n203=..Disable:set %immune 0 | echo 4 %ver Immunity to all protection is now disabled
  933. n204=..Enable- SuperOps:set %immune 1 | echo 4 %ver Immunity to all protection is now enabled for the super ops
  934. n205=..Enable- SuperOpsAndVoicedUsers:set %immune 2 | echo 4 %ver Immunity to all protection is now enabled for the super ops and the voiced users
  935. n206=..Enable- AllChannelOps:set %immune 3 | echo 4 %ver Immunity to all protection is now enabled for all channel ops
  936. n207=.ChannelFloodingPunishmentSeverity
  937. n208=..BanOnly (AndOpDeop):set %punish 1 | echo 4 %ver Flooding punishment is now enabled to ban only for %punishtimer seconds (and deopping for ops)
  938. n209=..KickAndBan:set %punish 2 | echo 4 %ver Flooding punishment is now enabled to kicking and banning for %punishtimer seconds
  939. n210=..EditBanTimerLength:{
  940. n211=  set %temp $$?="Enter timer length in seconds (default 10)" | if (%temp < 2) || (%temp > 3000) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  941. n212=  set %punishtimer %temp | unset %temp | echo 4 %ver The ban on a flood now lasts for %punishtimer seconds
  942. n213=}
  943. n214=.KickingOnPrivateFlood
  944. n215=..Disable:set %privatekick 0 | echo 4 %ver Kicking on private flood is now disabled
  945. n216=..Enable:set %privatekick 1 | echo 4 %ver Kicking on private flood is now enabled
  946. n217=.CloneOn-JoinDetection
  947. n218=..Disable:set %cloneset 0 | echo 4 %ver The clone on-join detection setting is  now disabled
  948. n219=..Enable- PersonalNotification:set %cloneset 1 | echo 4 %ver The clone on-join detection setting is now enabled to personal notification
  949. n220=..Enable- SetCloneLimitAndKickIfExceeded:{
  950. n221=  set %temp $$?="Enter the clone limit (default 2)" | if (%temp < 1) || (%temp > 20) { echo 4 %ver Invalid setting, please try again | unset %temp | halt }
  951. n222=  if (%temp == %clonesallowed) && (%cloneset == 2) { echo 4 %ver The clone on-join detection setting is already enabled to a strict %clonesallowed clone limit | unset %temp | halt }
  952. n223=  set %cloneset 2 | set %clonesallowed %temp | unset %temp | echo 4 %ver The clone on-join detection setting has been enabled to a strict %clonesallowed clone limit
  953. n224=}
  954. n225=.ModeChangeProtection
  955. n226=..Disable:set %modeprot 0 | echo 4 %ver Channel mode change protection is now disabled
  956. n227=..Enable- Normal:set %modeprot 1 | echo 4 %ver Channel mode change protection is now enabled with a current setting of + $+ %modeplus $+ - $+ %modeminus
  957. n228=..Enable- Deop:set %modeprot 2 | echo 4 %ver Channel mode change protection is now enabled with a current setting of + $+ %modeplus $+ - $+ %modeminus $+ , and a user deop
  958. n229=..Enable- Kick/Ban:set %modeprot 3 | echo 4 %ver Channel mode change protection is now enabled with a current setting of + $+ %modeplus $+ - $+ %modeminus $+ , and a user kick/ban
  959. n230=..EditSetting:{
  960. n231=  set %temp $$?="Enter your protection plus modes (default tn)" | if ($gettok(%temp,2,32) != $null) { echo 4 %ver Submissions for the mode enforce settings can not be more than one word | unset %temp | halt }
  961. n232=  set %count 0
  962. n233=  :start
  963. n234=  inc %count | if (%count > $len(%temp)) { goto end }
  964. n235=  set %current $mid(%count,1,%temp) | if (%current !isin %modes) { echo 4 %ver The setting of  $+ %current $+  is invalid, please try again | unset %temp %count %current | halt }
  965. n236=  goto start
  966. n237=  :end
  967. n238=  unset %count %current
  968. n239=  if (k isin %temp) { set %tempk $$?="Enter your mode key setting:" } | if ($gettok(%tempk,2,32) != $null) { echo 4 %ver Submissions for the mode key setting can not be more than one word | unset %temp %tempk | halt }
  969. n240=  if (l isin %temp) { set %templ $$?="Enter your mode limit setting" } | if ($gettok(%templ,2,32) != $null) { echo 4 %ver Submissions for the mode limit setting can not be more than one word | unset %temp %tempk %templ | halt }
  970. n241=  if ((%templ < 1) || (%templ > 10000)) && (l isin %temp) { echo 4 %ver Invalid mode limit setting, please try again | unset %temp %tempk %templ | halt }
  971. n242=  set %temp2 $$?="Enter your protection minus modes (default k)" | if ($gettok(%temp2,2,32) != $null) { echo 4 %ver Submissions for the mode enforce settings can not be more than one word | unset %temp2 %temp %tempk %templ | halt }
  972. n243=  set %count 0
  973. n244=  :start2
  974. n245=  inc %count | if (%count > $len(%temp2)) { goto end2 }
  975. n246=  set %current $mid(%count,1,%temp2) | if (%current !isin %modes) { echo 4 %ver The setting of  $+ %current $+  is invalid, please try again | unset %temp %temp2 %tempk %templ %count %current | halt }
  976. n247=  if (%current isin %temp) { echo 4 %ver The setting - %current - was made for both plus and minus mode protection - no changes were made | unset %temp %temp2 %tempk %templ %count %current | halt }
  977. n248=  goto start2
  978. n249=  :end2
  979. n250=  unset %modekey %modelimit | set %modeplus %temp | set %modeminus %temp2 | if (%tempk != null) { set %modekey %tempk }
  980. n251=  if (%templ != $null) { set %modelimit %templ }
  981. n252=  echo 4 %ver Channel mode change protection is now enabled with a current setting of + $+ %modeplus $+ - $+ %modeminus $+ , and this will now be enforced in all channels
  982. n253=  enforcemode | unset %temp %temp2 %tempk %templ %count %current
  983. n254=}
  984. n255=.ServerOpProtection
  985. n256=..Disable:set %serverprot 0 | echo 4 %ver Server Op protection is now disabled
  986. n257=..Enable:set %serverprot 1 | echo 4 %ver Server Op protection is now enabled
  987. n258=.SuperOpAutoOpping
  988. n259=..Disable:set %autoopping 0 | echo 4 %ver Super op auto-opping is now disabled
  989. n260=..Enable:set %autoopping 1 | echo 4 %ver Super op auto-opping is now enabled
  990. n261=.RevengeSetting
  991. n262=..Disable:set %revenge 0 | echo 4 %ver Script revenge is now disabled
  992. n263=..Enable:set %revenge 1 | echo 4 %ver Script revenge is now enabled
  993. n264=.OffensiveNickProtection
  994. n265=..Disable:set %offensivenick 0 | echo 4 %ver Offensive nick protection is now disabled
  995. n266=..Enable:set %offensivenick 1 | echo 4 %ver Offensive nick protection is now enabled
  996. n267=..AddToOffensiveNickList:{
  997. n268=  set %temp $$?="Enter the offensive word to add" | if ($gettok(%temp,2,32) != $null) { echo 4 %ver Submissions for the offensive word list can not be more than one word | unset %temp | halt }
  998. n269=  set %nick %temp | offensivenickcheck | if (%lev != 0) { echo 4 %ver The word  $+ %temp $+  is already on the offensive nick word list | unset %temp | halt }
  999. n270=  write $mircdirsettings\ $+ badnicks.txt %temp | echo 4 %ver The word  $+ %temp $+  has been added to the offensive nick word list | unset %temp
  1000. n271=}
  1001. n272=.UnallowedTextProtection
  1002. n273=..Disable:set %unallowedtext 0 | echo 4 %ver Unallowed text protection is now disabled
  1003. n274=..Enable- SilenceBanPunishmentOnly:set %unallowedtext 1 | echo 4 %ver Unallowed text protection is now enabled to a silence ban punishment
  1004. n275=..Enable- KickAndBanPunishment:set %unallowedtext 2 | echo 4 %ver Unallowed text protection is now enabled to a kick&ban punishment
  1005. n276=..AddToUnallowedTextList:{
  1006. n277=  set %temp $$?="Enter the word/phrase to add"
  1007. n278=  set %nick %temp | unallowedtextcheck | if (%lev != 0) { echo 4 %ver The choice of  $+ %temp $+  is already on the unallowed text list | unset %temp | halt }
  1008. n279=  write $mircdirsettings\ $+ badwords.txt %temp | echo 4 %ver The choice of  $+ %temp $+  has been added to the unallowed text list | unset %temp
  1009. n280=}
  1010. n281=.IRCopJoinNotification
  1011. n282=..Disable:set %ircop 0 | echo 4 %ver IRCop join notification is now disabled
  1012. n283=..Enable:set %ircop 1 | echo 4 %ver IRCop join notification is now enabled
  1013. n284=.SuperOpsCanOnlyOp
  1014. n285=..Disable:set %superonly 0 | echo 4 %ver The super-ops-can-only-op setting is now disabled
  1015. n286=..Enable:set %superonly 1 | echo 4 %ver The super-ops-can-only-op setting is now enabled
  1016. n287=.ChannelAutoJoin
  1017. n288=..Disable:set %autojoin 0 | echo 4 %ver Channel auto-join on startup is now disabled
  1018. n289=..Enable:set %autojoin 1 | echo 4 %ver Channel auto-join on startup is now enabled
  1019. n290=.AutoPinger
  1020. n291=..Disable:set %autoping 0 | echo 4 %ver The channel auto-pinger (when people enter 'ping me') is now disabled
  1021. n292=..Enable:set %autoping 1 | echo 4 %ver The channel auto-pinger (when people enter 'ping me') is now enabled
  1022. n293=.ViewingCurrentStatistics
  1023. n294=..StatusBar:set %display 1 | echo 4 %ver The current statistics are now displayed into the status bar
  1024. n295=..IndependentWindow:set %display 2 | echo 4 %ver The current statistics are now displayed into an independent window
  1025. n296=.-
  1026. n297=-
  1027. n298===> SwitchToSimplePopups <==:.load -p spopups.ini
  1028. n299=-
  1029.